module tests.nocomp.Issue348 where

newtype Flip a b = Flip (b, a)

instance Functor (Flip a) where
  fmap f (Flip (b, a)) = Flip ((f b), a)
